home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
IRIX Base Documentation 1998 November
/
IRIX 6.5.2 Base Documentation November 1998.img
/
usr
/
share
/
catman
/
p_man
/
cat3
/
f90
/
abs.z
/
abs
Wrap
Text File
|
1998-10-30
|
5KB
|
131 lines
ABS(3M) Last changed: 1-6-98
NNAAMMEE
AABBSS, IIAABBSS, DDAABBSS, CCAABBSS, CCDDAABBSS - Computes absolute value
SSYYNNOOPPSSIISS
UNICOS and UNICOS/mk systems:
AABBSS (([AA==]_a))
IIAABBSS (([AA==]_a))
DDAABBSS (([AA==]_a))
CCAABBSS (([AA==]_a))
UNICOS and IRIX systems:
CCDDAABBSS (([AA==]_a))
IIMMPPLLEEMMEENNTTAATTIIOONN
UNICOS, UNICOS/mk, and IRIX systems
SSTTAANNDDAARRDDSS
Fortran 90
CCDDAABBSS is a compiler extension to Fortran 90
DDEESSCCRRIIPPTTIIOONN
AABBSS is the generic function name. AABBSS, IIAABBSS, DDAABBSS, and CCAABBSS are
intrinsic and are elemental functions for the CF90 compiler.
The entry point CCDDAABBSS is provided for support in other languages. It
is not recognized as an intrinsic function; therefore, you must use
the CCDDIIRR$$ VVFFUUNNCCTTIIOONN directive to allow vectorization.
These functions evaluate as follows: _y = |_x|, except for CCAABBSS and
CCDDAABBSS, which evaluate the following:
2 2 1/2
_y = |(_x + _x ) |''
_r _i
CCFF9900
CCDDAABBSS is called implicitly by the Fortran 90 compiler as a result of a
generic AABBSS call with a complex double argument.
CCAALL RReeggiisstteerr UUssaaggee ((CCrraayy RReesseeaarrcchh SSyysstteemmss OOnnllyy))
Scalar IIAABBSS: IIAABBSS%% (call-by-register)
on entry (S1) = argument
on exit (S1) = result
Scalar DDAABBSS: DDAABBSS%% (call-by-register)
on entry (S1) and (S2) = argument
on exit (S1) and (S2) = result
Scalar CCAABBSS: CCAABBSS%% (call-by-register)
on entry (S1) and (S2) = argument
on exit (S1) = result
Vector CCAABBSS: %%CCAABBSS%% (call-by-register)
on entry (V1) = argument vector 1 (real part)
(V2) = argument vector 2 (imaginary part)
on exit (V1) = result vector
Scalar CCDDAABBSS: CCDDAABBSS%% (call-by-register)
on entry (S1), (S2), (S3), (S4) = argument
on exit (S1), (S2) = result
Vector CCDDAABBSS: %%CCDDAABBSS%% (call-by-register)
on entry (V1), (V2), (V3), (V4) = argument vector
on exit (V1), (V2) = result vector
AArrgguummeenntt RRaannggeess 2450
infinity is approximately 10
308
On UNICOS/mk systems, infinity is approximately 10
AABBSS, IIAABBSS, DDAABBSS:
|_x| < infinity
CCAABBSS, CCDDAABBSS (CCDDAABBSS is not available on UNICOS/mk systems):
|_x |, |_x | < infinity
_r _i
NNOOTTEESS
CCDDAABBSS is an outmoded routine for the CF90 compiler. Refer to the
_F_o_r_t_r_a_n _L_a_n_g_u_a_g_e _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, _V_o_l_u_m_e _3, publication SR-3905, for
information about outmoded features and their preferred standard
alternatives.
The name of the AABBSS, IIAABBSS, DDAABBSS, and CCAABBSS intrinsic can be passed as
an argument. The name of the CCDDAABBSS intrinsic cannot be passed as an
argument.
RREETTUURRNN VVAALLUUEESS
AABBSS returns the real absolute value of its real argument.
IIAABBSS returns the integer absolute value of its integer argument.
DDAABBSS returns the double-precision absolute value of its
double-precision argument.
CCAABBSS returns the absolute value of its complex argument as a real
number.
CCDDAABBSS returns the absolute value of its complex double-precision
argument as a double-precision number.
When the correct value would overflow, CCAABBSS and CCDDAABBSS abort with a
floating-point error.
On CRAY T90 systems that support IEEE arithmetic, the following return
values occur:
AABBSS((_x)):
|_x| = infinity, result is infinity
_x = NaN, result is NaN
CCAABBSS((_x))::
_x or _y = NaN, result is NaN
|_x| = infinity and _y is not NaN, result is infinity
|_y| = inf and _x is not NaN, result is infinity
When overflow occurs for good input, infinity is returned.
SSEEEE AALLSSOO
_I_n_t_r_i_n_s_i_c _P_r_o_c_e_d_u_r_e_s _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, publication SR-2138, for the
printed version of this man page.